


(defun shell-setting ()

  ;; Disable shell-dirstack-mode and enable dirtrack mode,
  ;; because dirtrack mode is better than shell-dirstack-mode
  (shell-dirtrack-mode -1)
  (setq-default dirtrack-list '("\\(^[^:].*\\):\\([^$].*\\)\\$" 2))
  (dirtrack-mode 1)

  (define-key shell-mode-map (kbd "C-j") 'comint-send-input))


(add-hook 'shell-mode-hook 'shell-setting)

;; (add-hook 'emacs-startup-hook #'(lambda () 
;;                                   (command-execute 'shell)))

(provide 'init-shell)
